home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d26 / stages12.arc / HELPS2.C < prev    next >
Text File  |  1991-05-22  |  40KB  |  939 lines
  1. #include "header.h"
  2. #include "file.h"
  3.  
  4. /*************************************************************************/
  5. /**    help printout functions, part 2                    **/
  6. /**                                    **/
  7. /**    includes: helpoptable                        **/
  8. /**          helpoptions                        **/
  9. /**          helpopfile                        **/
  10. /**          helphardcopy                        **/
  11. /**          helpfkeys                        **/
  12. /**          helpdisplaymenu                    **/
  13. /**          helpanimalmenu                    **/
  14. /**          helpcyclelenip                    **/
  15. /**                                    **/
  16. /*************************************************************************/
  17. /*
  18.       5    10        20        30        40        50        60        70        80
  19.   ----+----+----+----+----+----+----+----+----+----+----+----+----+----+----+----+
  20. */
  21.  
  22.  
  23. /********************************/
  24. /*     function: helpoptable    */
  25. /********************************/
  26. helpoptable ()
  27. {
  28. #if PC
  29.   int i;
  30.   
  31.   topline(" Output Table Explanation ");
  32.   clrscr1(1);
  33.   normvideo();
  34.   i = 2;
  35.   gotoxy(1, i++);
  36.   cprintf("%sFor each cell traced, the program determines its position in the", tab4);
  37.   gotoxy(1, i++);
  38.   cprintf("%scycle after the user-specified number of days.  This can be either", tab4);
  39.   gotoxy(1, i++);
  40.   cprintf("%sforward (positive days) or backward (negative days) in time.", tab4);
  41.   i++;
  42.   gotoxy(1, i++);
  43.   cprintf("%sSince it may not be known exactly how far along in a stage an observed", tab4);
  44.   gotoxy(1, i++);
  45.   cprintf("%scell is, the program determines the cycle position reached from four", tab4);
  46.   gotoxy(1, i++);
  47.   cprintf("%spoints in the initial stage:  at the beginning, at the first third,", tab4);
  48.   gotoxy(1, i++);
  49.   cprintf("%sat the second third, and at the end.", tab4);
  50.   hitreturn(1);
  51.   clrscr1(1);
  52.   i = 2;;
  53.   gotoxy(1, i++);
  54.   cprintf("%sThe output table shows the cycle position reached for each initial", tab4);
  55.   gotoxy(1, i++);
  56.   cprintf("%scell, had that cell started in the first third, middle third, or", tab4);
  57.   gotoxy(1, i++);
  58.   cprintf("%slast third of its initial stage.", tab4);
  59.   i++;
  60.   gotoxy(1, i++);
  61.   highvideo();
  62.   cprintf("%sPre-Entry", tab4);
  63.   normvideo();
  64.   cprintf(" or ");
  65.   highvideo();
  66.   cprintf("PreEnt");
  67.   normvideo();
  68.   cprintf(" means that the given number of days was greater");
  69.   gotoxy(1, i++);
  70.   cprintf("%sthan the time the cell had existed in the cycle; ", tab4);
  71.   highvideo();
  72.   cprintf("Ejaculate");
  73.   normvideo();
  74.   cprintf(" or ");
  75.   highvideo();
  76.   cprintf("Ejact");
  77.   normvideo();
  78.   gotoxy(1, i++);
  79.   cprintf("%smeans that the specified days was greater than the time required", tab4);
  80.   gotoxy(1, i++);
  81.   cprintf("%sfor spermiation to occur.", tab4);
  82.   i++;
  83.   gotoxy(1, i++);
  84.   highvideo();
  85.   cprintf("%sEpididymis", tab4);
  86.   normvideo();
  87.   cprintf(" means that spermiation has occurred, and the cell is moving");
  88.   gotoxy(1, i++);
  89.   cprintf("%sthrough the epididymis.  NOTE: The transit time used is only an", tab4);
  90.   gotoxy(1, i++);
  91.   cprintf("%sestimate; the actual transit time depends upon the sexual activity of", tab4);
  92.   gotoxy(1, i++);
  93.   cprintf("%sthe animal.", tab4);
  94.   hitreturn(1);
  95.   clrscr1(1);
  96.   i = 2;
  97.   gotoxy(1, i++);
  98.   cprintf("%sIf the number of days causes the specified initial cell to move", tab4);
  99.   gotoxy(1, i++);
  100.   cprintf("%sbeyond the boundaries of the cycle (epididymis or ejaculate, if", tab4);
  101.   gotoxy(1, i++);
  102.   cprintf("%smoving forward; pre-entry, if moving backward), then the output", tab4);
  103.   gotoxy(1, i++);
  104.   cprintf("%stable will show the correct stage of spermatogenesis that cells", tab4);
  105.   gotoxy(1, i++);
  106.   cprintf("%sin the same stage as the initial cell would have reached.", tab4);
  107.   i++;
  108.   gotoxy(1, i++);
  109.   cprintf("%sFor example, suppose the Sprague-Dawley Rat is the animal being", tab4);
  110.   gotoxy(1, i++);
  111.   cprintf("%sstudied.  If the initial cell is A1-9 and Stages is used to", tab4);
  112.   gotoxy(1, i++);
  113.   cprintf("%spredict where that cell will be in 68 days, that particular cell", tab4);
  114.   gotoxy(1, i++);
  115.   cprintf("%swould have completed spermatogenesis after just 51.6 days; but", tab4);
  116.   gotoxy(1, i++);
  117.   cprintf("%sthe output table would show that younger cells that started in stage", tab4);
  118.   gotoxy(1, i++);
  119.   cprintf("%s9 of the cycle would have ended up in stage 14, after 68 days.", tab4);
  120.   hitreturn(1);
  121.   if (HARDCOPY) {
  122.     togglepr();
  123.     fprintf(stdprn, "\n\n");
  124.     printline(2, LNWID, '-');
  125.     fprintf(stdprn, "\n\t\t    Output Table Explanation\n\n");
  126.     fprintf(stdprn, "\tFor each cell tracked, the program determines its position in the\n");
  127.     fprintf(stdprn, "\tcycle after the user-specified number of days.  This can be either\n");
  128.     fprintf(stdprn, "\tforward (positive days) or backward (negative days) in time.\n\n");
  129.     fprintf(stdprn, "\tSince it may not be known exactly how far along in a stage an observed\n");
  130.     fprintf(stdprn, "\tcell is, the program determines the cycle position reached from four\n");
  131.     fprintf(stdprn, "\tpoints in the initial stage:  at the beginning, at the first third,\n");
  132.     fprintf(stdprn, "\tat the second third, and at the end.\n\n");
  133.     fprintf(stdprn, "\tThe output table shows the cycle position reached for each initial\n");
  134.     fprintf(stdprn, "\tcell, had that cell started in the first third, middle third, or\n");
  135.     fprintf(stdprn, "\tlast third of its initial stage.\n\n");
  136.     fprintf(stdprn, "\tPre-Entry or PreEnt means that the given number of days was greater\n");
  137.     fprintf(stdprn, "\tthan the time the cell had existed in the cycle; Ejaculate or Ejact\n");
  138.     fprintf(stdprn, "\tmeans that the specified days was greater than the time required\n");
  139.     fprintf(stdprn, "\tfor spermiation to occur.\n\n");
  140.     fprintf(stdprn, "\tEpididymis means that spermiation has occurred, and the cell is moving\n");
  141.     fprintf(stdprn, "\tthrough the epididymis.  NOTE: The transit time used is only an\n");
  142.     fprintf(stdprn, "\testimate; the actual transit time depends upon the sexual activity of\n");
  143.     fprintf(stdprn, "\tthe animal.\n\n");
  144.     printline(2, LNWID, '-');
  145.   }
  146. #else
  147.   printf("\n\n");
  148.   printline(0, LNWID, '-');
  149.   printf("\n\t\t    Output Table Explanation\n\n");
  150.   printf("\tFor each cell tracked, the program determines its position in the\n");
  151.   printf("\tcycle after the user-specified number of days.  This can be either\n");
  152.   printf("\tforward (positive days) or backward (negative days) in time.\n\n");
  153.   printf("\tSince it may not be known exactly how far along in a stage an observed\n");
  154.   printf("\tcell is, the program determines the cycle position reached from four\n");
  155.   printf("\tpoints in the initial stage:  at the beginning, at the first third,\n");
  156.   printf("\tat the second third, and at the end.\n\n");
  157.   printf("\tThe output table shows the cycle position reached for each initial\n");
  158.   printf("\tcell, had that cell started in the first third, middle third, or\n");
  159.   printf("\tlast third of its initial stage.\n\n");
  160.   printf("\tPre-Entry or PreEnt means that the given number of days was greater\n");
  161.   printf("\tthan the time the cell had existed in the cycle; Ejaculate or Ejact\n");
  162.   printf("\tmeans that the specified days was greater than the time required\n");
  163.   printf("\tfor spermiation to occur.\n\n");
  164.   printf("\tEpididymis means that spermiation has occurred, and the cell is moving\n");
  165.   printf("\tthrough the epididymis.  NOTE: The transit time used is only an\n");
  166.   printf("\testimate; the actual transit time depends upon the sexual activity of\n");
  167.   printf("\tthe animal.\n");
  168.   printline(0, LNWID, '-');
  169. #endif
  170. #if VERBOSE
  171.   if (FILEq && FILECOPY) {
  172.     fprintf(fpout, "\n\n");
  173.     printline(1, LNWID, '-');
  174.     fprintf(fpout, "\n\t\t    Output Table Explanation\n\n");
  175.     fprintf(fpout, "\tFor each cell tracked, the program determines its position in the\n");
  176.     fprintf(fpout, "\tcycle after the user-specified number of days.  This can be either\n");
  177.     fprintf(fpout, "\tforward (positive days) or backward (negative days) in time.\n\n");
  178.     fprintf(fpout, "\tSince it may not be known exactly how far along in a stage an observed\n");
  179.     fprintf(fpout, "\tcell is, the program determines the cycle position reached from four\n");
  180.     fprintf(fpout, "\tpoints in the initial stage:  at the beginning, at the first third,\n");
  181.     fprintf(fpout, "\tat the second third, and at the end.\n\n");
  182.     fprintf(fpout, "\tThe output table shows the cycle position reached for each initial\n");
  183.     fprintf(fpout, "\tcell, had that cell started in the first third, middle third, or\n");
  184.     fprintf(fpout, "\tlast third of its initial stage.\n\n");
  185.     fprintf(fpout, "\tPre-Entry or PreEnt means that the given number of days was greater\n");
  186.     fprintf(fpout, "\tthan the time the cell had existed in the cycle; Ejaculate or Ejact\n");
  187.     fprintf(fpout, "\tmeans that the specified days was greater than the time required\n");
  188.     fprintf(fpout, "\tfor spermiation to occur.\n\n");
  189.     fprintf(fpout, "\tEpididymis means that spermiation has occurred, and the cell is moving\n");
  190.     fprintf(fpout, "\tthrough the epididymis.  NOTE: The transit time used is only an\n");
  191.     fprintf(fpout, "\testimate; the actual transit time depends upon the sexual activity of\n");
  192.     fprintf(fpout, "\tthe animal.\n");
  193.     printline(1, LNWID, '-');
  194.   }
  195. #endif
  196.   return(0);
  197. } /* helpoptable */
  198.  
  199. /********************************/
  200. /*     function: helpoptions    */
  201. /********************************/
  202. /* this is really a menu */
  203. helpoptions (opfil)
  204.   char *opfil;        /* name of opfil: "stages.out" */
  205. {
  206.   int valid;
  207.   char input[MAXLEN];
  208. #if PC
  209.   int i, val;
  210.   
  211.   topline(" Printer and File Options ");
  212.   clrscr1(1);
  213.   normvideo();
  214.   i = 2;
  215.   gotoxy(1, i++);
  216.   cprintf("%sOutput from Stages may be printed out on your printer, or saved", tab);
  217.   gotoxy(1, i++);
  218.   cprintf("%sin a file in the current working directory.  You can change the", tab);
  219.   gotoxy(1, i++);
  220.   cprintf("%sdefault setting of the output file here, for this run of Stages.", tab);
  221.   i++;
  222.   gotoxy(1, i++);
  223.   cprintf("%sDefault setting:", tab);
  224.   i++;
  225. /*
  226.   gotoxy(1, i++);
  227.   cprintf("%s         PRINTER:  Deactivated", tab);
  228. */
  229.   gotoxy(1, i++);
  230.   cprintf("%s            FILE:  Do not send output to a file", tab);
  231.   hitreturn(1);
  232.   clrscr1(1);
  233.   i = 2;
  234.   gotoxy(1, i++);
  235.   cprintf("%sPrinter Use:", tab);
  236.   i++;
  237.   gotoxy(1, i++);
  238.   cprintf("%s(see also Help Menu, `Help!: Saving Output to a Printer')", tab);
  239.   i++;
  240.   gotoxy(1, i++);
  241.   cprintf("%sThe information on any screen can be sent to the printer by using", tab);
  242.   gotoxy(1, i++);
  243.   cprintf("%sthe F8 function key on your keyboard.  The F8 key works like the", tab);
  244.   gotoxy(1, i++);
  245.   cprintf("%sPrintScreen key on your keyboard, except that F8 prints a little", tab);
  246.   gotoxy(1, i++);
  247.   cprintf("%sfaster, since only the important information is printed.", tab);
  248.   hitreturn(1);
  249.   if (HARDCOPY) {
  250.     togglepr();
  251.     fprintf(stdprn, "\n\n");
  252.     printline(2, LNWID, '-');
  253.     fprintf(stdprn, "\n\t\t    Printer and File Options\n\n");
  254.     fprintf(stdprn, "\tOutput from Stages may be printed out on your printer, or saved\n");
  255.     fprintf(stdprn, "\tin a file in the current working directory.  You can change the\n");
  256.     fprintf(stdprn, "\tdefault setting of the output file here, for this run of Stages.\n\n");
  257.     fprintf(stdprn, "\tDefault setting:\n");
  258. /*
  259.     fprintf(stdprn, "\t         PRINTER:  Deactivated\n");
  260. */
  261.     fprintf(stdprn, "\t            FILE:  Do not send output to a file\n\n");
  262.     fprintf(stdprn, "\tPrinter Use:\n");
  263.     fprintf(stdprn, "\t(see also Help Menu, `Help!: Saving Output to a Printer')\n\n");
  264.     fprintf(stdprn, "\tThe information on any screen can be sent to the printer, by using\n");
  265.     fprintf(stdprn, "\tthe F8 function key on your keyboard.  The F8 key works like the\n");
  266.     fprintf(stdprn, "\tPrintScreen key on your keyboard, except that F8 prints a little\n");
  267.     fprintf(stdprn, "\tfaster, since only the important information is printed.\n");
  268.     printline(2, LNWID, '-');
  269.   }
  270. #else
  271.   printf("\n\n");
  272.   printline(0, LNWID, '-');
  273.   printf("\n\t\t    Printer and File Options\n\n");
  274.   printf("\tOutput from Stages may be printed out on your printer, or saved\n");
  275.   printf("\tin a file in the current working directory.  You can change the\n");
  276.   printf("\tdefault setting of the output file here, for this run of Stages.\n\n");
  277.   printf("\tDefault setting:\n");
  278. /*
  279.   printf("\t         PRINTER:  Deactivated\n");
  280. */
  281.   printf("\t            FILE:  Do not send output to a file\n\n");
  282.   printf("\tPrinter Use:\n");
  283.   printf("\t(see also Help Menu, `Help!: Saving Output to a Printer')\n\n");
  284.   printf("\tThe information on any screen can be sent to the printer, by using\n");
  285.   printf("\tthe F8 function key on your keyboard.  The F8 key works like the\n");
  286.   printf("\tPrintScreen key on your keyboard, except that F8 prints a little\n");
  287.   printf("\tfaster, since only the important information is printed.\n");
  288.   printline(0, LNWID, '-');
  289. #endif
  290. #if VERBOSE
  291.   if (FILEq && FILECOPY) {
  292.     fprintf(fpout, "\n\n");
  293.     printline(1, LNWID, '-');
  294.     fprintf(fpout, "\n\t\t    Printer and File Options\n\n");
  295.     fprintf(fpout, "\tOutput from Stages may be printed out on your printer, or saved\n");
  296.     fprintf(fpout, "\tin a file in the current working directory.  You can change the\n");
  297.     fprintf(fpout, "\tdefault setting of the output file here, for this run of Stages.\n\n");
  298.     fprintf(fpout, "\tDefault setting:\n");
  299. /*
  300.     fprintf(fpout, "\t         PRINTER:  Deactivated\n");
  301. */
  302.     fprintf(fpout, "\t            FILE:  Do not send output to a file\n\n");
  303.     fprintf(fpout, "\tPrinter Use:\n");
  304.     fprintf(fpout, "\t(see also Help Menu, `Help!: Saving Output to a Printer')\n\n");
  305.     fprintf(fpout, "\tThe information on any screen can be sent to the printer, by using\n");
  306.     fprintf(fpout, "\tthe F8 function key on your keyboard.  The F8 key works like the\n");
  307.     fprintf(fpout, "\tPrintScreen key on your keyboard, except that F8 prints a little\n");
  308.     fprintf(fpout, "\tfaster, since only the important information is printed.\n");
  309.     printline(1, LNWID, '-');
  310.   }
  311. #endif
  312.  
  313.   valid = 0;
  314.   while (! valid) {
  315.  
  316. #if PC
  317.     clrscr1(1);
  318.     i = 2;
  319.     gotoxy(1, i++);
  320.     cprintf("%sOutput to File <stages.out>:", tab);
  321.     i++;
  322.     gotoxy(1, i++);
  323.     cprintf("%sPlease select one option.", tab);
  324.     gotoxy(1, i++);
  325.     cprintf("%s    A:  Do not send output to file (default)", tab);
  326.     gotoxy(1, i++);
  327.     cprintf("%s    B:  Send output to file stages.out, overwrite", tab);
  328.     gotoxy(1, i++);
  329.     cprintf("%s    C:  Send output to file stages.out, append", tab);
  330.     gotoxy(1, i++);
  331.     cprintf("%s    D:  Quit menu, do not change file status", tab);
  332.     i++;
  333.     clrscr1(2);
  334.     cprintf("%sPlease enter your choice:", tab);
  335.     gotoxy(1, 2);
  336.     highvideo();
  337.     cprintf("%s%c%c%c ", tab2, HBAR, HBAR, RTRI);
  338.     normvideo();
  339.     val = getusrstr(input);
  340.     if (HARDCOPY) {
  341.       togglepr();
  342.       fprintf(stdprn, "\n\t\t    Output to File <stages.out>:\n\n");
  343.       fprintf(stdprn, "\tPlease select one option.\n\n");
  344.       fprintf(stdprn, "\t    A:  Do not send output to file (default)\n");
  345.       fprintf(stdprn, "\t    B:  Send output to file stages.out, overwrite\n");
  346.       fprintf(stdprn, "\t    C:  Send output to file stages.out, append\n");
  347.       fprintf(stdprn, "\t    D:  Quit menu, do not change file status\n");
  348.       fprintf(stdprn, "\n\tPlease enter your choice:\n");
  349.       fprintf(stdprn, "\t\t==> %s", input);
  350.     }
  351. #else
  352.     printf("\n\t\t    Output to File <stages.out>:\n\n");
  353.     printf("\tPlease select one option.\n\n");
  354.     printf("\t    A:  Do not send output to file (default)\n");
  355.     printf("\t    B:  Send output to file stages.out, overwrite\n");
  356.     printf("\t    C:  Send output to file stages.out, append\n");
  357.     printf("\t    D:  Quit menu, do not change file status\n");
  358.     printf("\n\tPlease enter your choice:\n");
  359.     printf("\t\t==> ");
  360.     getusrstr(input);
  361. #endif
  362. #if VERBOSE
  363.     if (FILEq && FILECOPY) {
  364.       fprintf(fpout, "\n\t\t    Output to File <stages.out>:\n\n");
  365.       fprintf(fpout, "\tPlease select one option.\n\n");
  366.       fprintf(fpout, "\t    A:  Do not send output to file (default)\n");
  367.       fprintf(fpout, "\t    B:  Send output to file stages.out, overwrite\n");
  368.       fprintf(fpout, "\t    C:  Send output to file stages.out, append\n");
  369.       fprintf(fpout, "\t    D:  Quit menu, do not change file status\n");
  370.       fprintf(fpout, "\n\tPlease enter your choice:\n");
  371.       fprintf(fpout, "\t\t==> %s", input);
  372.     }
  373. #endif
  374.     
  375. #if PC
  376.     if (val) return(val);
  377. #endif
  378.     switch (toupper1(input[0])) {
  379.  
  380.     case 'A':        /* no file */
  381.       valid = 1;
  382.       FILEq = 0;
  383.       FILECOPY = 0;
  384.       break;
  385.  
  386.     case 'B':        /* file, overwrite */
  387.       valid = 1;
  388.       FILEq = 1;
  389.       FILECOPY = 1;
  390.       fpout = fopen("stages.out", "w");
  391.       strcpy(opfil, "stages.out");
  392.       printintro(0, 1);
  393. #if PC
  394.       printFILECOPY();
  395. #endif
  396.       break;
  397.  
  398.     case 'C':        /* file, append */
  399.       valid = 1;
  400.       FILEq = 1;
  401.       FILECOPY = 1;
  402.       fpout = fopen("stages.out", "a");
  403.       strcpy(opfil, "stages.out");
  404.       printintro(0, 1);
  405. #if PC
  406.       printFILECOPY();
  407. #endif
  408.       break;
  409.  
  410.     case 'D':        /* quit, no change */
  411.       valid = 1;
  412.       break;
  413.       
  414.     default:
  415.       FILEq = 0;
  416.       FILECOPY = 0;
  417. #if PC
  418.       clrscr1(3);
  419.       printf("%s%sInvalid choice:  <%c>.", tab, ERRSTR, input[0]);
  420.       if (HARDCOPY) {
  421.     togglepr();
  422.     fprintf(stdprn, "\t%sInvalid choice:  <%c>.", ERRSTR, input[0]);
  423.       }
  424. #else
  425.       printf("\t%sInvalid choice:  <%c>.", ERRSTR, input[0]);
  426. #endif
  427.       if (FILEq && FILECOPY)
  428.     fprintf(fpout, "\t%sInvalid choice:  <%c>.", ERRSTR, input[0]);
  429.     } /* switch */
  430.  
  431.     if (FILEq) {
  432. #if PC
  433.       outputwin();
  434.       gotoxy(1, i++);
  435.       cprintf("%sWriting to the file stages.out can be started and stopped at", tab);
  436.       gotoxy(1, i++);
  437.       cprintf("%sany time by pressing the F7 function key on your keyboard.  An", tab);
  438.       gotoxy(1, i++);
  439.       cprintf("%sannunciator at the bottom left corner of the screen indicates", tab);
  440.       gotoxy(1, i++);
  441.       cprintf("%sthe current file output status.", tab);
  442.       hitreturn(1);
  443.       if (HARDCOPY) {
  444.     togglepr();
  445.     fprintf(stdprn, "\tWriting to the file stages.out can be started and stopped at\n");
  446.     fprintf(stdprn, "\tany time by pressing the F7 function key on your keyboard.  An\n");
  447.     fprintf(stdprn, "\t annunciator at the bottom left corner of the screen indicates\n");
  448.     fprintf(stdprn, "\tthe current file output status.\n");
  449.       }
  450. #endif
  451. #if VERBOSE
  452.       if (FILEq && FILECOPY) {
  453.     fprintf(fpout, "\tWriting to the file stages.out can be started and stopped at\n");
  454.     fprintf(fpout, "\tany time by pressing the F7 function key on your keyboard.  An\n");
  455.     fprintf(fpout, "\tannunciator at the bottom left corner of the screen indicates\n");
  456.     fprintf(fpout, "\tthe current file output status.\n");
  457.       }
  458. #endif
  459.     } /* if FILEq */
  460.   } /* while */
  461.   return(0);
  462. } /* helpoptions */
  463.  
  464. /********************************/
  465. /*     function: helpopfile    */
  466. /********************************/
  467. helpopfile ()
  468. {
  469. #if PC
  470.   int i;
  471.   
  472.   topline(" Help!: Saving Output to a File ");
  473.   clrscr1(1);
  474.   normvideo();
  475.   i = 2;
  476.   gotoxy(1, i++);
  477.   cprintf("%sThe output generated by Stages can be saved in an output file", tab);
  478.   gotoxy(1, i++);
  479.   cprintf("%scalled stages.out in the current working directory.  Data can", tab);
  480.   gotoxy(1, i++);
  481.   cprintf("%soverwrite or be appended to an existing copy of stages.out.", tab);
  482.   i++;
  483.   gotoxy(1, i++);
  484.   cprintf("%sBy default, no output file stages.out is created.  If you", tab);
  485.   gotoxy(1, i++);
  486.   cprintf("%swant to save this Stages session's output in stages.out, choose", tab);
  487.   gotoxy(1, i++);
  488.   cprintf("%s`Printer and File Options' at the General Menu.", tab);
  489.   hitreturn(1);
  490.   if (HARDCOPY) {
  491.     togglepr();
  492.     fprintf(stdprn, "\n\n");
  493.     printline(2, LNWID, '-');
  494.     fprintf(stdprn, "\n\t\t    Help!: Saving Output to a File\n\n");
  495.     fprintf(stdprn, "\tThe output generated by Stages can be saved in an output file\n");
  496.     fprintf(stdprn, "\tcalled stages.out in the current working directory.  Data can\n");
  497.     fprintf(stdprn, "\toverwrite or be appended to an existing copy of stages.out.\n\n");
  498.     fprintf(stdprn, "\tBy default, no output file stages.out is created.  If you\n");
  499.     fprintf(stdprn, "\twant to save this Stages session's output in stages.out, choose\n");
  500.     fprintf(stdprn, "\t`Printer and File Options' at the General Menu.\n");
  501.     printline(2, LNWID, '-');
  502.   }
  503. #else
  504.   printf("\n\n");
  505.   printline(0, LNWID, '-');
  506.   printf("\n\t\t    Help!: Saving Output to a File\n\n");
  507.   printf("\tThe output generated by Stages can be saved in an output file\n");
  508.   printf("\tcalled stages.out in the current working directory.  Data can\n");
  509.   printf("\toverwrite or be appended to an existing copy of stages.out.\n\n");
  510.   printf("\tBy default, no output file stages.out is created.  If you\n");
  511.   printf("\twant to save this Stages session's output in stages.out, choose\n");
  512.   printf("\t`Printer and File Options' at the General Menu.\n");
  513.   printline(0, LNWID, '-');
  514. #endif
  515. #if VERBOSE
  516.   if (FILEq && FILECOPY) {
  517.     fprintf(fpout, "\n\n");
  518.     printline(1, LNWID, '-');
  519.     fprintf(fpout, "\n\t\t    Help!: Saving Output to a File\n\n");
  520.     fprintf(fpout, "\tThe output generated by Stages can be saved in an output file\n");
  521.     fprintf(fpout, "\tcalled stages.out in the current working directory.  Data can\n");
  522.     fprintf(fpout, "\toverwrite or be appended to an existing copy of stages.out.\n\n");
  523.     fprintf(fpout, "\tBy default, no output file stages.out is created.  If you\n");
  524.     fprintf(fpout, "\twant to save this Stages session's output in stages.out, choose\n");
  525.     fprintf(fpout, "\t`Printer and File Options' at the General Menu.\n");
  526.     printline(1, LNWID, '-');
  527.   }
  528. #endif
  529.   return(0);
  530. } /* helpopfile */
  531.  
  532. #if PC
  533. /********************************/
  534. /*     function: helphardcopy    */
  535. /********************************/
  536. helphardcopy ()
  537. {
  538.   int i;
  539.  
  540.   topline(" Help!: Sending Output to a Printer ");
  541.   clrscr1(1);
  542.   normvideo();
  543.   i = 2;
  544.   gotoxy(1, i++);
  545.   cprintf("%sTo record any information presented on this terminal screen, either:", tab);
  546.   i++;
  547.   gotoxy(1, i++);
  548.   cprintf("%s  1/  Use the PrintScreen key on your keyboard, if one exists, or", tab);
  549.   gotoxy(1, i++);
  550.   cprintf("%s  2/  Use the F8 function key on your keyboard.", tab);
  551.   i++;
  552.   gotoxy(1, i++);
  553.   cprintf("%sThe F8 key works a little faster than the PrintScreen key, because", tab);
  554.   gotoxy(1, i++);
  555.   cprintf("%sonly the important information on the screen will be sent to the", tab);
  556.   gotoxy(1, i++);
  557.   cprintf("%sprinter.", tab);
  558.   hitreturn(1);
  559.   if (HARDCOPY) {
  560.     togglepr();
  561.     fprintf(stdprn, "\n\n");
  562.     printline(2, LNWID, '-');
  563.     fprintf(stdprn, "\n\t\t    Help!: Sending Output to a Printer\n\n");
  564.     fprintf(stdprn, "\tTo record any information presented on this terminal screen, either:\n");
  565.     fprintf(stdprn, "\t  1/  Use the PrintScreen key on your keyboard, if one exists, or\n");
  566.     fprintf(stdprn, "\t  2/  Use the F8 function key on your keyboard.\n");
  567.     fprintf(stdprn, "\tThe F8 key works a little faster than the PrintScreen key, because\n");
  568.     fprintf(stdprn, "\tonly the important information on the screen will be sent to the\n");
  569.     fprintf(stdprn, "\tprinter.\n");
  570.     printline(2, LNWID, '-');
  571.   }
  572.  
  573. #if VERBOSE
  574.   if (FILEq && FILECOPY) {
  575.     fprintf(fpout, "\n\n");
  576.     printline(1, LNWID, '-');
  577.     fprintf(fpout, "\n\t\t    Help!: Sending Output to a Printer\n\n");
  578.     fprintf(fpout, "\tTo record any information presented on this terminal screen, either:\n");
  579.     fprintf(fpout, "\t  1/  Use the PrintScreen key on your keyboard, if one exists, or\n");
  580.     fprintf(fpout, "\t  2/  Use the F8 function key on your keyboard.\n");
  581.     fprintf(fpout, "\tThe F8 key works a little faster than the PrintScreen key, because\n");
  582.     fprintf(fpout, "\tonly the important information on the screen will be sent to the\n");
  583.     fprintf(fpout, "\tprinter.\n");
  584.     printline(1, LNWID, '-');
  585.   }
  586. #endif
  587.   return(0);
  588. } /* helphardcopy */
  589.  
  590. /********************************/
  591. /*     function: helpfkeys    */
  592. /********************************/
  593. helpfkeys ()
  594. {
  595.   int i;
  596.   
  597.   topline(" Help!: Using the F1-F10 Keys ");
  598.   clrscr1(1);
  599.   normvideo();
  600.   i = 2;
  601.   gotoxy(1, i++);
  602.   cprintf("%sThe ten function keys, F1-F10, have been defined as follows:", tab);
  603.   i++;
  604.   gotoxy(1, i++);
  605.   cprintf("%sF1: go to General Menu        F7: Toggle output to file", tab);
  606.   gotoxy(1, i++);
  607.   cprintf("%sF2: go to Help Menu           F8: Print screen", tab);
  608.   gotoxy(1, i++);
  609.   cprintf("%sF3: go to Animal Menu         F9: Refresh the screen", tab);
  610.   gotoxy(1, i++);
  611.   cprintf("%sF4: go to Cycle Length Menu  F10: Exit the program", tab);
  612.   gotoxy(1, i++);
  613.   cprintf("%sF5: go to Cell Input Menu", tab);
  614.   gotoxy(1, i++);
  615.   cprintf("%sF6: go to Days Input Menu", tab);
  616.   i++;
  617.   gotoxy(1, i++);
  618.   cprintf("%sThe F-keys can be used any time Stages asks for input.  However,", tab);
  619.   gotoxy(1, i++);
  620.   cprintf("%sif pressed as response to `Press any key to continue:', their", tab);
  621.   gotoxy(1, i++);
  622.   cprintf("%sspecial functions are not performed -- except for the F8 key,", tab);
  623.   gotoxy(1, i++);
  624.   cprintf("%swhich will still print out the current screen's information.", tab);
  625.   hitreturn(1);
  626.   if (HARDCOPY) {
  627.     togglepr();
  628.     fprintf(stdprn, "\n\n");
  629.     printline(2, LNWID, '-');
  630.     fprintf(stdprn, "\n\t\t    Help!: Using the F1-F10 Keys\n\n");
  631.     fprintf(stdprn, "\tThe ten function keys, F1-F10, have been defined as follows:\n\n");
  632.     fprintf(stdprn, "\tF1: go to General Menu       F7: Toggle output to file\n");
  633.     fprintf(stdprn, "\tF2: go to Help Menu          F8: Print screen\n");
  634.     fprintf(stdprn, "\tF3: go to Animal Menu      F9: Refresh the screen\n");
  635.     fprintf(stdprn, "\tF4: go to Display Menu      F10: Exit the program\n");
  636.     fprintf(stdprn, "\tF5: go to Cell Input Menu\n");
  637.     fprintf(stdprn, "\tF6: go to Days Input Menu\n");
  638.     fprintf(stdprn, "\tThe F-keys can be used any time Stages asks for input.  However,\n\n");
  639.     fprintf(stdprn, "\tif pressed as response to `Press any key to continue:', their\n");
  640.     fprintf(stdprn, "\tspecial functions are not performed -- except for the F8 key,\n");
  641.     fprintf(stdprn, "\twhich will still print out the current screen's information.\n");
  642.     printline(2, LNWID, '-');
  643.   }
  644. #if VERBOSE
  645.   if (FILEq && FILECOPY) {
  646.     fprintf(fpout, "\n\n");
  647.     printline(1, LNWID, '-');
  648.     fprintf(fpout, "\n\t\t    Help!: Using the F1-F10 Keys\n\n");
  649.     fprintf(fpout, "\tThe ten function keys, F1-F10, have been defined as follows:\n\n");
  650.     fprintf(fpout, "\tF1: go to General Menu       F7: Toggle output to file\n");
  651.     fprintf(fpout, "\tF2: go to Help Menu          F8: Print screen\n");
  652.     fprintf(fpout, "\tF3: go to Animal Menu      F9: Refresh the screen\n");
  653.     fprintf(fpout, "\tF4: go to Display Menu      F10: Exit the program\n");
  654.     fprintf(fpout, "\tF5: go to Cell Input Menu\n");
  655.     fprintf(fpout, "\tF6: go to Days Input Menu\n");
  656.     fprintf(fpout, "\tThe F-keys can be used any time Stages asks for input.  However,\n\n");
  657.     fprintf(fpout, "\tif pressed as response to `Press any key to continue:', their\n");
  658.     fprintf(fpout, "\tspecial functions are not performed -- except for the F8 key,\n");
  659.     fprintf(fpout, "\twhich will still print out the current screen's information.\n");
  660.     printline(1, LNWID, '-');
  661.   }
  662. #endif
  663.   return(0);
  664. } /* helpfkeys */
  665.  
  666. #endif
  667.  
  668. /********************************/
  669. /*     function: helpdisplaymenu*/
  670. /********************************/
  671. helpdisplaymenu ()
  672. {
  673. #if PC
  674.   int i;
  675.   
  676.   topline(" Help!: Using the Display Menu ");
  677.   clrscr1(1);
  678.   normvideo();
  679.   i = 2;
  680.   gotoxy(1, i++);
  681.   if (strcmp(Animal, "None"))
  682.     cprintf("%sThis menu allows you to display data on the %s.", tab, Animal);
  683.   else
  684.     cprintf("%sThis menu allows you to display data on the current animal.", tab);
  685.   i++;
  686.   gotoxy(1, i++);
  687.   cprintf("%sChoosing `Stage Length Data' will display the stages and their", tab);
  688.   gotoxy(1, i++);
  689.   cprintf("%sassociated lengths (in days), along with the cycle length (in", tab);
  690.   gotoxy(1, i++);
  691.   cprintf("%sdays) and a reference for these data.", tab);
  692.   i++;
  693.   gotoxy(1, i++);
  694.   cprintf("%sChoosing `Cell Sequence Data' will display the cell names in", tab);
  695.   gotoxy(1, i++);
  696.   cprintf("%sthe correct order of spermatogenesis.  These cell names are", tab);
  697.   gotoxy(1, i++);
  698.   cprintf("%sin the proper syntax that Stages uses and expects as input", tab);
  699.   gotoxy(1, i++);
  700.   cprintf("%sfrom the user.", tab);
  701.   hitreturn(1);
  702.   if (HARDCOPY) {
  703.     togglepr();
  704.     fprintf(stdprn, "\n\n");
  705.     printline(2, LNWID, '-');
  706.     fprintf(stdprn, "\n\t\t    Help!: Using the Display Menu\n\n");
  707.     if (strcmp(Animal, "None"))
  708.       fprintf(stdprn, "\tThis menu allows you to display data on the %s.\n", Animal);
  709.     else
  710.       fprintf(stdprn, "\tThis menu allows you to display data on the current animal.\n");
  711.     fprintf(stdprn, "\tChoosing `Stage Length Data' will display the stages and their\n");
  712.     fprintf(stdprn, "\tassociated lengths (in days), along with the cycle length (in\n");
  713.     fprintf(stdprn, "\tdays) and a reference for these data.\n\n");
  714.     fprintf(stdprn, "\tChoosing `Cell Sequence Data' will display the cell names in\n");
  715.     fprintf(stdprn, "\tthe correct order of spermatogenesis.  These cell names are\n");
  716.     fprintf(stdprn, "\tin the proper syntax that Stages uses and expects as\n");
  717.     fprintf(stdprn, "\tinput from the user.\n");
  718.     printline(2, LNWID, '-');
  719.   }
  720. #else
  721.   printf("\n\n");
  722.   printline(0, LNWID, '-');
  723.   printf("\n\t\t    Help!: Using the Display Menu\n\n");
  724.   if (strcmp(Animal, "None"))
  725.     printf("\tThis menu allows you to display data on the %s.\n", Animal);
  726.   else
  727.     printf("\tThis menu allows you to display data on the current animal.\n");
  728.   printf("\tChoosing `Stage Length Data' will display the stages and their\n");
  729.   printf("\tassociated lengths (in days), along with the cycle length (in\n");
  730.   printf("\tdays) and a reference for these data.\n\n");
  731.   printf("\tChoosing `Cell Sequence Data' will display the cell names in\n");
  732.   printf("\tthe correct order of spermatogenesis.  These cell names are\n");
  733.   printf("\tin the proper syntax that Stages uses and expects as\n");
  734.   printf("\tinput from the user.\n");
  735.   printline(0, LNWID, '-');
  736. #endif
  737. #if VERBOSE
  738.   if (FILEq && FILECOPY) {
  739.     fprintf(fpout, "\n\n");
  740.     printline(1, LNWID, '-');
  741.     fprintf(fpout, "\n\t\t    Help!: Using the Display Menu\n\n");
  742.     if (strcmp(Animal, "None"))
  743.       fprintf(fpout, "\tThis menu allows you to display data on the %s.\n", Animal);
  744.     else
  745.       fprintf(fpout, "\tThis menu allows you to display data on the current animal.\n");
  746.     fprintf(fpout, "\tChoosing `Stage Length Data' will display the stages and their\n");
  747.     fprintf(fpout, "\tassociated lengths (in days), along with the cycle length (in\n");
  748.     fprintf(fpout, "\tdays) and a reference for these data.\n\n");
  749.     fprintf(fpout, "\tChoosing `Cell Sequence Data' will display the cell names in\n");
  750.     fprintf(fpout, "\tthe correct order of spermatogenesis.  These cell names are\n");
  751.     fprintf(fpout, "\tin the proper syntax that Stages uses and expects as\n");
  752.     fprintf(fpout, "\tinput from the user.\n");
  753.     printline(1, LNWID, '-');
  754.   }
  755. #endif
  756.   return(0);
  757. } /* helpdisplaymenu */
  758.  
  759. /********************************/
  760. /*     function: helpanimalmenu    */
  761. /********************************/
  762. helpanimalmenu ()
  763. {
  764. #if PC
  765.   int i;
  766.   
  767.   topline(" Help!: Using the Animal Menu ");
  768.   clrscr1(1);
  769.   normvideo();
  770.   i = 2;
  771.   gotoxy(1, i++);
  772.   cprintf("%sStages needs an animal type.  Once an animal has been selected,", tab);
  773.   gotoxy(1, i++);
  774.   cprintf("%sStages can read the appropriate files to obtain the data on that", tab);
  775.   gotoxy(1, i++);
  776.   cprintf("%sanimal's cycle of the seminiferous epithelium.", tab);
  777.   i++;
  778.   gotoxy(1, i++);
  779.   cprintf("%sStages can access the data for the following animals:", tab);
  780.   i++;
  781.   gotoxy(1, i++);
  782.   cprintf("%s      1/  Sprague-Dawley Rat", tab);
  783.   gotoxy(1, i++);
  784.   cprintf("%s      2/  Sherman Rat", tab);
  785.   gotoxy(1, i++);
  786.   cprintf("%s      3/  Hamster", tab);
  787.   gotoxy(1, i++);
  788.   cprintf("%s      4/  C3H Mouse", tab);
  789.   gotoxy(1, i++);
  790.   cprintf("%s      5/  Dog", tab);
  791.   i++;
  792.   gotoxy(1, i++);
  793.   cprintf("%sStages cannot proceed until an animal is selected.", tab);
  794.   hitreturn(1);
  795.   if (HARDCOPY) {
  796.     togglepr();
  797.     fprintf(stdprn, "\n\n");
  798.     printline(2, LNWID, '-');
  799.     fprintf(stdprn, "\n\t\t    Help!: Using the Animal Menu\n\n");
  800.     fprintf(stdprn, "\tStages needs an animal type.  Once an animal has been selected,\n");
  801.     fprintf(stdprn, "\tStages can read the appropriate files to obtain the data on that\n");
  802.     fprintf(stdprn, "\tanimal's cycle of the seminiferous epithelium.\n\n");
  803.     fprintf(stdprn, "\tStages can access the data for the following animals:\n\n");
  804.     fprintf(stdprn, "\t      1/  Sprague-Dawley Rat\n");
  805.     fprintf(stdprn, "\t      2/  Sherman Rat\n");
  806.     fprintf(stdprn, "\t      3/  Hamster\n");
  807.     fprintf(stdprn, "\t      4/  C3H Mouse\n");
  808.     fprintf(stdprn, "\t      5/  Dog\n\n");
  809.     fprintf(stdprn, "\tStages cannot proceed until an animal is selected.\n");
  810.     printline(2, LNWID, '-');
  811.   }
  812. #else
  813.   printf("\n\n");
  814.   printline(0, LNWID, '-');
  815.   printf("\n\t\t    Help!: Using the Animal Menu\n\n");
  816.   printf("\tStages needs an animal type.  Once an animal has been selected,\n");
  817.   printf("\tStages can read the appropriate files to obtain the data on that\n");
  818.   printf("\tanimal's cycle of the seminiferous epithelium.\n\n");
  819.   printf("\tStages can access the data for the following animals:\n\n");
  820.   printf("\t      1/  Sprague-Dawley Rat\n");
  821.   printf("\t      2/  Sherman Rat\n");
  822.   printf("\t      3/  Hamster\n");
  823.   printf("\t      4/  C3H Mouse\n");
  824.   printf("\t      5/  Dog\n\n");
  825.   printf("\tStages cannot proceed until an animal is selected.\n");
  826.   printline(0, LNWID, '-');
  827. #endif
  828. #if VERBOSE
  829.   if (FILEq && FILECOPY) {
  830.     fprintf(fpout, "\n\n");
  831.     printline(1, LNWID, '-');
  832.     fprintf(fpout, "\n\t\t    Help!: Using the Animal Menu\n\n");
  833.     fprintf(fpout, "\tStages needs an animal type.  Once an animal has been selected,\n");
  834.     fprintf(fpout, "\tStages can read the appropriate files to obtain the data on that\n");
  835.     fprintf(fpout, "\tanimal's cycle of the seminiferous epithelium.\n\n");
  836.     fprintf(fpout, "\tStages can access the data for the following animals:\n\n");
  837.     fprintf(fpout, "\t      1/  Sprague-Dawley Rat\n");
  838.     fprintf(fpout, "\t      2/  Sherman Rat\n");
  839.     fprintf(fpout, "\t      3/  Hamster\n");
  840.     fprintf(fpout, "\t      4/  C3H Mouse\n");
  841.     fprintf(fpout, "\t      5/  Dog\n\n");
  842.     fprintf(fpout, "\tStages cannot proceed until an animal is selected.\n");
  843.     printline(1, LNWID, '-');
  844.   }
  845. #endif
  846.   return(0);
  847. } /* helpanimalmenu */
  848.  
  849. /**********************************/
  850. /*     function: helpcyclelenip   */
  851. /**********************************/
  852. helpcyclelenip ()
  853. {
  854. #if PC
  855.   int i;
  856.  
  857.   topline(" Help!: Entering a New Cycle Length ");
  858.   clrscr1(1);
  859.   normvideo();
  860.   i = 2;
  861.   gotoxy(1, i++);
  862.   cprintf("%sStages uses the duration of the seminiferous epithelium, in days,", tab);
  863.   gotoxy(1, i++);
  864.   cprintf("%sin its computations.  Each animal has associated with it a default", tab);
  865.   gotoxy(1, i++);
  866.   cprintf("%scycle length, given in the literature.  Under certain experimental", tab);
  867.   gotoxy(1, i++);
  868.   cprintf("%sconditions, the cycle duration may be altered.", tab);
  869.   i++;
  870.   gotoxy(1, i++);
  871.   cprintf("%sTo test for changes in the cycle duration, a new cycle length, in", tab);
  872.   gotoxy(1, i++);
  873.   cprintf("%sdays, can be entered if so desired.  Continued substitution of", tab);
  874.   gotoxy(1, i++);
  875.   cprintf("%snew cycle lengths, until the predicted data match the observed", tab);
  876.   gotoxy(1, i++);
  877.   cprintf("%sdata, can lead to an estimation of the altered cycle length.", tab);
  878.   i++;
  879.   if (strcmp(Animal, "None")) {
  880.     gotoxy(1, i++);
  881.     cprintf("%s     Default Cycle Length: %.2lf days", tab, CycleTime);
  882.   }
  883.   hitreturn(1);
  884.   if (HARDCOPY) {
  885.     togglepr();
  886.     fprintf(stdprn, "\n\n");
  887.     printline(2, LNWID, '-');
  888.     fprintf(stdprn, "\n\t\t    Help!: Entering a New Cycle Length\n\n");
  889.     fprintf(stdprn, "\tStages uses the duration of the seminiferous epithelium, in days,\n");
  890.     fprintf(stdprn, "\tin its computations.  Each animal has associated with it a default\n");
  891.     fprintf(stdprn, "\tcycle length, given in the literature.  Under certain experimental\n");
  892.     fprintf(stdprn, "\tconditions, the cycle duration may be altered.\n\n");
  893.     fprintf(stdprn, "\tTo test for changes in the cycle duration, a new cycle length, in\n");
  894.     fprintf(stdprn, "\tdays, can be entered if so desired.  Continued substitution of\n");
  895.     fprintf(stdprn, "\tnew cycle lengths, until the predicted data match the observed\n");
  896.     fprintf(stdprn, "\tdata, can lead to an estimation of the altered cycle length.\n\n");
  897.     if (strcmp(Animal, "None")) {
  898.       fprintf(stdprn, "\t     Default Cycle Length: %.2lf days\n", CycleTime);
  899.     }
  900.     printline(2, LNWID, '-');
  901.   }
  902. #else
  903.   printf("\n\n");
  904.   printline(0, LNWID, '-');
  905.   printf("\n\t\t    Help!: Entering a New Cycle Length\n\n");
  906.   printf("\tStages uses the duration of the seminiferous epithelium, in days,\n");
  907.   printf("\tin its computations.  Each animal has associated with it a default\n");
  908.   printf("\tcycle length, given in the literature.  Under certain experimental\n");
  909.   printf("\tconditions, the cycle duration may be altered.\n\n");
  910.   printf("\tTo test for changes in the cycle duration, a new cycle length, in\n");
  911.   printf("\tdays, can be entered if so desired.  Continued substitution of\n");
  912.   printf("\tnew cycle lengths, until the predicted data match the observed\n");
  913.   printf("\tdata, can lead to an estimation of the altered cycle length.\n\n");
  914.   if (strcmp(Animal, "None"))
  915.     printf("\t     Default Cycle Length: %.2lf days\n", CycleTime);
  916.   printline(0, LNWID, '-');
  917. #endif
  918.  
  919. #if VERBOSE
  920.   if (FILEq && FILECOPY) {
  921.     fprintf(fpout, "\n\n");
  922.     printline(1, LNWID, '-');
  923.     fprintf(fpout, "\n\t\t    Help!: Entering a New Cycle Length\n\n");
  924.     fprintf(fpout, "\tStages uses the duration of the seminiferous epithelium, in days,\n");
  925.     fprintf(fpout, "\tin its computations.  Each animal has associated with it a default\n");
  926.     fprintf(fpout, "\tcycle length, given in the literature.  Under certain experimental\n");
  927.     fprintf(fpout, "\tconditions, the cycle duration may be altered.\n\n");
  928.     fprintf(fpout, "\tTo test for changes in the cycle duration, a new cycle length, in\n");
  929.     fprintf(fpout, "\tdays, can be entered if so desired.  Continued substitution of\n");
  930.     fprintf(fpout, "\tnew cycle lengths, until the predicted data match the observed\n");
  931.     fprintf(fpout, "\tdata, can lead to an estimation of the altered cycle length.\n\n");
  932.     if (strcmp(Animal, "None"))
  933.       fprintf(fpout, "\t     Default Cycle Length: %.2lf days\n", CycleTime);
  934.     printline(1, LNWID, '-');
  935.   }
  936. #endif
  937.   return(0);
  938. } /* helpcyclelenip */
  939.